home *** CD-ROM | disk | FTP | other *** search
/ EnigmA Amiga Run 1996 March / EnigmA AMIGA RUN 05 (1996)(G.R. Edizioni)(IT)[!][issue 1996-03][Skylink CD IV].iso / earcd / program / ixemlsrc.lha / ixemul / stack / sub_d0_sp.c < prev    next >
C/C++ Source or Header  |  1995-12-23  |  361b  |  30 lines
  1. #include <stabs.h>
  2. #include <bases.h>
  3.  
  4. asm("
  5.     .text
  6.     .even
  7.     .globl    ___sub_d0_sp
  8.     .globl    ___unlk_a5_rts
  9.  
  10. ___sub_d0_sp:
  11.     movel    sp@+,a0
  12.     movel    sp,d1
  13.     subl    d0,d1
  14.     cmpl    "A4(___stk_limit)",d1
  15.     jcc    l0
  16.     jbsr    ___stkext
  17. l0:    subl    d0,sp
  18.     jmp    a0@
  19.  
  20. ___unlk_a5_rts:
  21.     movel    d0,a0
  22.     movel    a5,d0
  23.     jbsr    ___stkrst
  24.     movel    a0,d0
  25.     movel    sp@+,a5
  26.     rts
  27. ");
  28.  
  29. ALIAS(__move_d0_sp,__stkrst);
  30.